home *** CD-ROM | disk | FTP | other *** search
/ The National Palace Museum Experience / The National Palace Museum Experience.iso / Programs / Panorama.dxr / 00078.ls < prev    next >
Encoding:
Text File  |  1998-11-19  |  437 b   |  16 lines

  1. on exitFrame
  2.   global sbcontentsprite, gtransitionspeed, gnumviews, newview
  3.   sideboardinit()
  4.   set sbcontentsprite to 100
  5.   set gtransitionspeed to 3
  6.   set gnumviews to 0
  7.   repeat with i = 1 to the number of castMembers of castLib "Room"
  8.     if the name of member i of castLib "Room" starts "E-HSList" then
  9.       set gnumviews to gnumviews + 1
  10.     end if
  11.   end repeat
  12.   set newview to 1
  13.   einstallcontrolsideboard()
  14.   updateStage()
  15. end
  16.